home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 5 / Skunkware 5.iso / lib / logolib / pon < prev    next >
Text File  |  1995-05-03  |  153b  |  10 lines
  1. to pon :names
  2. ignore error
  3. catch "error [po namelist :names]
  4. local "err
  5. make "err error
  6. if not emptyp :err [(throw "error first bf :err)]
  7. end
  8.  
  9. bury "pon
  10.